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CAPÍTULO Il 


PARTE | — Fundamentos de microprocessadores 


A aparição do microprocessador provocou uma mudan- 
ça radical no projecto dos sistemas digitais. Segundo o 
processo tradicional, muitas vezes chamado de «lógica 
aleatória», os sistemas são projectados usando-se os 
blocos lógicos individuais (tais como flip-flops, gates e 
contadores), necessários a cada aplicação. 

A utilização da lógica aleatória implica uma configura- 
ção diferente para cada aplicação, havendo muito pou- 
cas semelhanças entre os diferentes sistemas. É um 
processo de projecto identico ao dos circuitos analógi- 
cos — uma vez construído o circuito, é extremamente 
difícil adaptá-lo a qualquer novo tipo de funcionamento. 
O microprocessador permite a construção dum sistema 
geral, que pode ser adaptado a uma larga variedade de 
aplicações sem ser necessário realizar grandes modifi- 
cações. A individualidade dos diferentes sistemas exis- 
te na lista de instruções (chamada «programa») que 
controla o seu funcionamento. Há, pois, duas compo- 
nentes nos sistemas com microprocessadores: 


— Os circuitos (a que se chama o «hardware») 
— Os programas (o «software»). 


Será feito um pequeno resumo sobre o hardware, para 
sabermos de que elementos é composto um sistema de 
microprocessador. Depois estudaremos programação e 
a forma de unir as duas componentes. 


1.1 — O desenvolvimento do microprocessador 


Os computadores electrónicos mais antigos eram 
construídos com válvulas, aos milhares. Eram máqui- 
nas enormes e com avarias constantes. 

A segunda geração já utilizava transistores. Conseguia- 
-se assim máquinas não só mais pequenas e mais fiá- 
veis como também mais baratas. 

Foi esta geração que marcou o início da era da expan- 
são dos computadores como equipamentos de larga 
utilização. 

Em 1960, computadores ainda mais pequenos e mais 
poderosos foram construídos à custa da utilização, pela 
primeira vez, de milhares de “gates”, “flip-flops' e ou- 
tros elementos sobre a forma de circuitos integrados 
SSI. 

O desenvolvimento da tecnologia dos semicondutores 


* Conforme já referido em n.º anterior, esta rubrica passa a conden- 
sar duas que se publicavam em separado — INTRODUÇÃO À 
LINGUAGEM MÁQUINA ZX81 e ESPAÇO SPECTRUM 


(Continuação) 


possibilitou, a breve trecho, a integração de dezenas de 
“gates” num único circuito. 

A tendência para a miniaturização manteve-se e, em 
1971, o primeiro microprocessador apareceu no merca- 
do. Continha num único circuito integrado a quase tota- 
lidade das secções de control e cálculo (“Unidade de 
Processamento Central — CPU”) de um computador. 
Um microprocessador contém milhares de “gates”, 
pertencendo por isso à categoria dos circuitos integra- 
dos em Larga Escala (LSI). Paralelamente a ele foram 
desenvolvidas memórias, também LSI, capazes de ar- 
mazenar milhares de bits. 


1.2. — Configuração básica de um microprocessador 


interessa-nos, em primeiro lugar, considerar um siste- 
ma central que possua dois periféricos: 


— O periférico de entrada (Teclado), que permite a 
introdução de instruções e dados. 

— O periférico de saída, aonde se visualiza o tra- 
balho executado pelo sistema, quando instruído. 


O microprocessador é, pois, o “cérebro do sistema”. 
Ele contém todos os circuitos lógicos necessários para 
executar, com a ajuda de um programa monitor, uma 
lista de instruções introduzidas pelo teclado segundo 
um código de linguagem por ele reconhecido. 


Microcompulador 


Bus de Endereços 













Periférico 
de 
entrada 


Perifé rico 
de 
Saida 
Bus de Dados 


Bus de Control 


Figura 1 — Esquema básico de um microprocessador 


Os blocos que pertencem ao microprocessador (zona 
rodeada pelo tracejado) estão interligados por meio de 
3 “buses”. Um “bus” é um grupo de fios que interligam 
os diferentes circuitos do sistema, em paralelo. O micro- 
processador usa o “bus de endereços” para selec- 
cionar as posições (ou células) de memória, ou Os 
“ports” de entrada ou de saída. Os endereços são co- 
mo os números de telefone, que identificam as localiza- 
ções aonde se quer colocar ou obter uma informação. 
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Ele selecciona uma localização através do “bus de en- 
dereços” e transfere os dados através do “bus de da- 
dos”. A informação pode viajar do microprocessador 
para a memória ou para o “port” de saída, e da memó- 
ria ou “port” de entrada para o microprocessador. 
O terceiro “bus” é chamado o “bus de control”. Através 
dele circulam dois tipos de sinais: 


— Os utilizados pelo microprocessador para notifi- 
car a memória ou os dispositivos de entrada/ 
/saida de que ele está pronto para realizar uma 
transferência de dados; 

— Os utilizados pela memória ou pelos dispositivos 
de entrada/saída para fazerem pedidos espe- 
ciais ao microprocessador. 


Como já sabemos, o elemento mais simples usado na 
informação binária é o bit (O ou 1). No entanto, os micro- 
processadores quase nunca manipulam a informação 
bit a bit. Eles processam em simultâneo grupos de bits 
chamados palavras. 

A maioria dos microprocessadores actualmente exis- 
tentes no mercado (entre eles o do ZX81 e do Spec- 
trum) trabalham com palavras de 8 bits. Para micropro- 
cessadores deste tipo, byte e palavra são usados indi- 
ferentes com o mesmo significado. No entanto, 
saliente-se que palavra pode usar-se para designar um 
grupo de 16 ou mais bits noutros tipos de compu- 
tadores. 


1.3 — Programação 


Como já foi dito, para obrigar um microprocessadora 
realizar uma dada tarefa, é necessário dispor de uma 
lista de instruções — cujo código ele entenda — que fi- 
quem devidamente armazenadas na memória do siste- 
ma. Ele começará por ler a primeira instrução disponií- 
vel, determina o seu significado, executa o trabalho 
correspondente... Depois vai ler a segunda, e assim 
sucessivamente. 

Como a programação é o principal tema deste texto, va- 
mos deixar os detalhes para mais tarde. 


1.4 — Buffers 3-State (Tri-State) 


Todos os elementos dum microcomputador trocam in- 
formações com o microprocessador, através do mesmo 
conjunto de fios (o “bus” de dados). 

O microprocessador selecciona um único elemento pa- 
ra colocar dados no bus e desliga os outros. Este tipo 
de funcionamento é conseguido, pelo facto de todos os 
elementos terem saídas “three-state” (3 estados). 





ENABLE 





Figura 2 — “Buffer 3 — State” 


A figura 2 mostra o símbolo e a tabela de verdade do 
“Buffer 3-State”, também chamado “driver 3-State”. 
O buffer tem uma entrada Enable” para além das habi- 
tuais entrada e saída: quando a entrada Enable está a 
“0”, o buffer funciona normalmente, transferindo o 
valor de entrada para a saída; Quando a entrada Enable 
está a '1”, a saída do buffer comporta-se como se esti- 
vesse no ar ou desligada. 

Os “drivers 3-State” são muito importantes porque 
permitem que muitos circuitos partilhem a mesma linha. 


ENABLE A 


Ee cooedad 


ENABLE B 


ENTRADA B » 


ENABLE C 
ENTRADA C » 


Figura 3 — Vários dispositivos partilhando a mesma linha de saída 


SAÍDA 


O circuito assim formado permite que qualquer um dos 
elementos “3-State'' possa colocar um sinal na saída. 
Um só Enable pode ser activado de cada vez, apare- 
cendo na saída a respectiva entrada do driver a que 
esse Enable pertence. 

Muitos circuitos, incluindo os microprocessadores e as 
memórias, contêm internamente “Drivers 3-State” na 
saída. Esses circuitos integrados terão uma entrada de 
control, muitas vezes designada por “Chip Select” 
(CS) ou “Chip Enable” (CE) que controla os referi- 
dos “drivers” de saída. 





* O traço por cima significa que a entrada é INVERSE 
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de saída 
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Figura 4 — Os DRIVERS 3-STATE num microcomputador 





Microprocessador 








3-State 
de saída 


3J-State 
de saída 


IL. 


DADOS 


Todos os circuitos que enviam Dados para o bus de 
dados têm “drivers 3-State” nas respectivas saídas. 
O microprocessador gera sinais de control — enviados 
através do Bus de control — para capacitar (pôr Enable 
a 0) o circuito 3-State, do qual quer receber dados. 





1.5 — O microprocessador 


Quer o ZX81, quer o Spectrum, utilizam o microproces- 
sador Z80 À da Zilog. 


All i AlO 

Al2 2 A9 

Al3 3 A8 

Al4 4 A7 

AlS 5 A6 

[9 ' AS 

D4 7 A& 

D3 8 AS 

DS 9 AZ 

D6 Al 
+(5V) AQ 

D2 GND(QV. ) 

D7 RFSH 

DO MI 

Dl RESET 

INT BUSRQ 

MNI WAIT 

HALT BUSAÉL 

MREQ WR 

IORQ RD 





Figura 5 — Microprocessador Z80 A 


Os terminais (AO a A15) iniciam as 16 linhas de barra- 
mento (BUS) de endereços. 

Os terminais (DO a D7) iniciam as 8 linhas de barra- 
mento de dados. 

Os terminais (+5 e GND) alimentam o microproces- 
sador. 

O terminal 6 é a entrada do relógio, que permite colo- 














car o oscilador interno, à frequência dos impulsos de 
sincronismo gerados exteriormente. 

Os restantes terminais servem para entrada ou saída 
de sinais de controlo, como se segue: 


MI — Identifica o período de extracção do ciclo máqui- 
na em curso. 

INT e NMI — São dois sinais de pedido de interrupção, 
com uma prioridade mais alta para o sinal NMI, que 
não pode ser desactivado por uma instrução “disable 
interrupts . 

HALT — Toma o valor lógico O, após a execução duma 
instrução HALT. 

MREQ — Identifica qualquer operação de acesso à 
memória, em curso. É um sinal “3-STATE”. 

IORQ — Identifica qualquer operação IN/OUT em 
curso. 

RFSH — Sinal utilizado para refrescar as memórias 
dinâmicas. 

RESET — Quando se faz reset = 0, os conteúdos dos 
registos do microprocessador tomam o valor lógico 0, 
os pedidos de interrupção via INT são desactivados e 
todos os sinais de controlo 3-State são colocados no 
estado de alta impedância. 

BUSRQ E BUSAK — São utilizados na técnica (DMA) 
de acesso directo à memória. 

Mais detalhes sobre o Z80 (A), serão dados quando 
falarmos dos seus registos. 


1.6 — Memórias 


Os sistemas com microprocessadores usam normal- 
mente memórias em circuito integrado para armazenar 
os programas e os dados. 

Muitos bits podem ser armazenados num único Cl. E 
normal dispormos de circuitos com 65.000 bits por 
“Chip”. Uma memória com essa capacidade armaze- 
na cerca de 8.000 letras ou algarismos, numa placa de 
silício com 1 cm?. 

A célula mais simples de memória é um flip-flop que 
armazena 1 bit de informação. 

A mais simples células integrada contém 8 flip-flops. A 
tecnologia LSI tornou possível a colocação de milhares 
dessas células, num único circuito integrado. 

Claro que com milhares de flip-flops, não pode haver 
um pino de saída para cada um deles, nem mesmo 
para cada célula integrada. 

A solução está no uso de entradas de endereço para 
seleccionar a localização da célula de memória que 
interessa. 

O endereço é descodificado na “Chip” e a célula de 
memória seleccionada é ligada às entradas ou saídas 
de dados. 

A figura 6 mostra-nos o diagrama bloco de uma célula 
integrada (8 flip-flops). 





Quffers 
J-state 
(saída) 


Ende 
reço 





Dados 


Célula 
flip-flop 
(& ou 1) 


Sinais de 
selecção 





Figura 6 — Diagrama — Bloco de uma célula integrada (8 flip-flops) 


A figura apenas mostra em pormenor os circuitos de 
saida de dados, para não complicar o diagrama. O 
descodificador converte as entradas (binárias) de en- 
dereços saídas separadas, uma para cada uma das 
possíveis configurações de endereço. Estes sinais 
controlam os 3 State que comutam a saída de cada 
celula (flip-flop). O dado contido na célula endereçada 
é assim colocado na linha de saída. Por este processo, 
milhares destas pequenas células podem estar ligadas 
ao mesmo pino de saída. 

Como o comando é sequencial, somente uma célula 
de cada vez deposita o seu sinal, no barramento de 
saida. 

O número de posições endereçaveis (células) de uma 
memória depende do número de entradas de endere- 
ços que ela possui. Com uma linha de endereço, ape- 
nas se pode seleccionar uma de duas posições: a cé- 
lula de endereço O e a de endereço 1. Com duas linhas 
de endereço pode ser seleccionada: endereços 00, 01, 
10, 11, etc. 


1.7 — RAMS e ROMS 


Os circuitos integrados memória usados com os micro- 
processadores, pertencem a duas grandes categorias: 
ROMS E RAMS. 

Uma ROM (Read Only memory) é uma memória que 
só pode ser lida. 

Os dados são colocados dentro dela na faze de fabri- 
co, ou ainda em certos casos, através da utilização de 
processos especiais imediatamente antes da sua colo- 
cação no circuito. Um programa gravado numa ROM é 
muitas vezes designado na literatura como “'firnware”. 
Uma Ram (Random Acess Memory) — memória de 
acesso directo —, é uma memória na qual os dados 
podem ser escritos (armazenados) e depois lidos (re- 
cuperados). Uma característica importante das RAMS 
é a sua volatilidade: elas perdem toda a informação 
que contêm quando a alimentação voltar, os dados 
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que ficam armazenados não têm qualquer significado. 
A figura 7, representa uma ROM contendo 2.048 pala- 
vras de 8 bits cada, ou 16384 bits. A letra K é utilizada 
para designar (21º) 1.024 bits. Assim, esta memória 
tem 2K bytes e, como cada uma das suas células 
contém 8 bits, trata-se de uma ROM de 2Kx8: 


ip 
Select” 


Endereço 





Figura 7 — ROM de 2Kx8 


Quando a entrada CS (Chip Select) for 0, o 3-State 
seleccionado pelo endereço, fica condutor: quando 
CS for 1, todas as saídas estão em aberto. 

A figura 8 representa uma RAM de 1 Kx8. As linhas 
de dados são bidireccionais, para a informação entrar 
ou sair da memória. 

As RAMS têm uma linha de control adicional cnamada 
WRITE. 

Para armazenar dados na RAM, selecciona-se em pri- 
meiro lugar um endereço, coloca-se a informação no . 
barramento de dados e WRITE a O. Logo que o en- 
dereço seja introduzido, o Chip Select é activado e os 
dados ficam armazenados. 


“Chip 
Select” 


Endereço 





Read/Write 


Figura 8-— RAM de 1Kx8 


A linha de WRITE determina a direcção do movimen- 
to dos dados (para dentro ou para for da memória). 
Esta linha é normalmente chamada RD/NR ou (RAN). 
Esta notação indica que, se a entrada estiver a “1”, é 
realizada uma leitura da memória e se for “0”, uma 
escrita (ou armazenamento). 

(Cont. no próximo número) 
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Autor: ALEXANDRE SOUSA 


FUNÇÃO... ATN (ARCTANGENTE) 
|. ATAN...ATND...ATNG...ARCTAN 


X 

Esta função ATN (n) calcula o arco Tangente corres- 
pondente ao valor da razão (n). Este valor é obtido 
em RADIANOS ... Um radiano equivale a 57 graus 
aproximadamente. 

ARCTANGENTE (ATN) é definido como o ângulo (A) 
requerido para uma certa razão entre o comprimento 
do lado oposto ao ângulo (Y) e o comprimento do 
lado adjacente (X). ATN significa literalmente “O Arco 
(ângulo) cuja Tangente é =”. 


A = ATN (Y/X) 
O oposto a ATN é Tangente (TAN). A Tangente do 


ângulo é = à razão entre o comprimento do lado 
oposto e o comprimento do lado adjacente. 


TAN (A) = Y/X 


PROGRAMA TESTE 


€ 40 REM "ATN” TESTE 


20 PRINT “ENTRADA DO VALOR DA 
TANGENTE...” 

30 INPUT N 

40 LET A = ATN(N) 

50 PRINT "O ANGULO CUJA TANGENTE E = ":N;” 


E IGUAL A “;A;” RADIANOS” 
RUN... 
ENTRADA DO VALOR DA TANGENTE... 


2 
O ÂNGULO CUJA TANGENTE E = 2 E IGUAL A 
1.1071487 RADIANOS 


Alguns computadores calculam o ângulo em graus ou 
em grados (100 grados = 90 graus). Estes computa- 
dores usam a função ATND para graus e ATNG para 
grados. 

O programa teste que usámos anteriormente, deveria 
apresentar os seguintes valores (SE O SEU COMPU- 
TADOR POSSUIR AS FUNÇÕES ATND e ATNG): 


63.43495 graus e 70.4833 grados. 
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(Continuação) 


PARA CONVERTER VALORES QUE ESTÃO EM RA- 
DIANOS PARA GRAUS, multiplique o ângulo (em ra- 
dianos) por 57.29578. 


EXEMPLO: 
LET D = ATN(A)X57.29578 


PARA CONVERTER VALORES QUE ESTÃO EM 
GRAUS EM RADIANOS, multiplicar o ângulo (em 
graus) por .0174533. 


EXEMPLO: 
LET R = A (ângulo expresso em graus) + .0174533 


IMPORTANTE: 


MUITOS COMPUTADORES POSSUEM SOMENTE 
ATN COMO FUNÇÃO TRIGONOMÉTRICA INVERSA 
E PODEM NÃO TER ARCOS OU ARCSIN. NESSE 
CASO APENAS ATN PERMITIRÁ CALCULAR 
ÂNGULOS. 

Se ATN é usada, então a Tangente é conhecida ou 
pode ser facilmente calculada. As fórmulas seguintes, 
permitem-lhe converter qualquer razão em Tangente 
e a partir desse ponto calcular o ângulo com ATN. 


AM = L200T TAM TAH= 





À 
TAH = Netos. TAM = ex ? - 
(ESA -— 4 


ESTAS FÓRMULAS QUE FAZEM USO DAS RELA- 
ÇÕES TRIGONOMÉTRICAS PERMITEM CALCULAR 
FUNÇÕES INVERSAS. Por exemplo, para calcular 
A = Arcsec(x), use: 


A = ATN (SQR(X-X—1)) 


AS FÓRMULAS PARA CADA UMA DAS FUNÇÕES 
INVERSAS, CODIFICADAS EM BASIC SÃO: 


ARCCOS (X) = 1.5708 — 2+ATN (X/(1 + SQR(— 


X*X))) 

ARCCOT (X) = ATN (1/X) 

ARCCSC (X) = ATN (1/SQR(X+X—1) 
ARCSEC (X) = ATN (SQR (X+X—1)) 
ARCSIN (X) = 2*ATN(X/(1 + SQR(I—X *X))) 


(Cont. no próximo número) 
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ES Sa Tr, E fm EE CE fas de Foo + = Cs: tt EE Sr e E Tt e. 
E Ut ES abiois É : TSt tia dis do o sad = o fo dns É o “e é amas 5 
02 IF 22 1 THEN LET aisai Sig FOR Ii cos 
ES PE AT Si, isl-1);CM GRDg CPoIHT o Do DIL.B ZE 
“ca PR MF ftaLelt,' +]: Gso PUKE locdsr., 
TESBR PE DT fSi-t À -]: SRif PRINT ET DI.B; ES 
“Erg PE A toe). SRag PRiUSE SS 
“cs PE Moo o iSi-Si.so cr Gas PURE lolazrs,255 
ESB RETUCM RES MEX? E 
O PRIHT AT Si.ial-da bica ae Sosa PRIHT Gr So. 
Sc) LET E&- 
vVaB RETiins Sida RETiicn 
SCDE REM ++ FHIGSENO sobe FOR Usi TÊ 
SDS IF ET:a=aT+ia THEN SSlg HEXT O 
Slcqd RETiiRs 





in. MICRO-INFORMATIQUE, Maio/83 pao ca 
Adap. e Trad.: ALEXANDRE SOUSA a TES LER RREO 
dog LET e € 44XC 22D0-L > 
728 LET Ma=8 


Este jogo consiste em governar um país, adminis- 40 GUSUB 2250 “N 


754 PRINT “QUANTOS ESCUDOS DESEJA DISTRIBUIR ROS SEUS HBITANTES 7" 


vr6B INPLIT Mi 


trando as finanças a partir de indicações fornecidas 
ao longo do jogo. Tem um certo interesse porque põe PTB IE MICO OR nim THEN GOTO 760 


. » 5 neo IF Mu THEN GOTO 1178 
a prova a sua coragem: conseguira acabar vivo? 830 Roi = A HECTARES DESEJA CULTIVAR 7" 


40 INPUT LS 


12 REM KX$44 O PRESIDENTE &$44X4E aSQ IF L3<6 THEN GOTO gsm 
1& SL Bem IF L3<=PAZ THEN GOTO s9B 
28 FRINT "ACABA LE SER ELEITO FRESIDLENTE DA FEFUELICA Lu ESTADO CA AFRI 865 CLS 
CA CENTRAL". “DE FACTO HOLVETRUGUE COM AS ELEICOES MAS MAO HA PROBLEMA. ' 879 PRINT “CADA HABITANTE NÃO CULTIVA MAIS DO QUE 2Z HECTARES. “ 
21 PRINT asa GOTO ssa 
22 PRINT "AQUI ESTRO ALGUMAS IDEIAS FARRA O BITUDAR A FAZEP EVOLUIR O PAIS. ACTU 398 IF L3<=L-19006 THEN GOTO 326 
ALMETE EM CRISE” 90% PRINT “NAO TEM MAIS DO QUE “,L-1900;," HECTARES DE TERER PARA CULTIVAR." 
: PRINT 
24 PRINT "Xx CADA HABLTANTE CISFENSA Log, na POR HO" 217 GOTO 3958 
25 PRINT “X A VASSA RECEITA “EM DAS TAXAS INDUSTRIAI Do TURISMO DA vE ago LET M4=INT o LSALIS 
NDA DE CEREAIS E DA TERHSFORMACRO DOS CAMPOS EM DONAS INDUSTRIAIS. 934 IF M4<=M THEN GOTO 996 
" 942 COSUP 2250 
26 PRINT “tt CADA ANO DIVIDE à ORCAMENTO DO Estado, PELA LUTA ANTI-POLUICAS, P 954 PRINT “O VOSSO CRORMENTO LIMITA-VOS RA "INT <M-L19," HECTARE DE PLANTACOES. 
ELOS HABITANTES. EDUCACAO E BCFICUL TUPA." " 
er GOSUB 2700 asA PRINT "A POPULACACO PODE TRABALHAR" P$2," HECTARES." 
25 PRINT “XX A EDUCACAO COPRECTA DE LM HABITANTE CUSTA 10F POR ANO." 288 GOTO 534 
994 LET M=INT cmM-MS» . 
22 PRINT tiBga TF mM=b THENCOTOILILVO 
34 LET NS=& 1805 GOSUIB 2258 
31 PRINT “*£ LIMA LUTA EFICAZ ANTI-FOLUTICRO CUSTA Q,44F POR UNIDADE DE PO lg14 PRINT “QUANTO PRETENDE DISPEHNSAP FARA A EDUCAÇÃO 7 
LUIÇARO. " 1A24 INFLIT MZ 
a2 PRINT 1220 IF M2<B OR MZ2>M THEN GOTO 1828 
33 PRINT "+ SEM VOS QUERER DESILUDIR DEVO VIZER QUE NENHUM DOS FRESIDENTESOU JA7A LET M=INT cM-MZ > 
E QUE “NS PRECEDEFAM HAaO TERMINARAM O SEL MANDATO, jaga IF 4=6 THEN GOTO 1174 
35 PRINT lusG IF L=2000 THEN GOTO 1176 
29 GNSUB 2700 1198 GOSUB 2259 
sm LET Ná=5 1195 PRINT “QUE GUANTIDADE FEHSA DISPENSAR PARA A LUTA CONTRA APOLUICAO +" 
sa PRINT 
6a PRIMHT “"BOR SORTE PARA OS VOSSOS “ud,” AHOS" 1114 INPUT 113 
298 RAND t1IZA IF MZ<cA CR M3>M THEN GOTO tita 
420 LET M=65000+INT cRNDACORA » 1150 LET M=INT cM-ME» 
410 LET P=INT + 4904205 > tia CLS 
s20 LET L=2806 1188 LET DB=R 
430 LET W=a 11538 LET E2=M2,2F 
431 LET xez=u 1204 LET CE=INT <cP-Mi-186> io 
432 LET Eg=a 1216 IF D2=8 THEN GUTO 1244 
434 LET X1=A 1228 LET DO=D2 
440 LET E1=A 1230 PRINT DZ." HABITANTES MORTOS DE FOME." 
441 LET S9=a iZsA LET D3=INT <S1- 100000X%c, 1+, 4SERNDOXP + 
442 LET SO=a 1254 IF DZ<=& THEM GOTO 1258 
443 LE7 HS=E 1262 PRINT D3," HABITANTES MORTOS POR EXCESSO DE POLUICRO." 
q4d LET Siza i27m LET CO=DB+D3 
445 LET DI=INT «F-3 12280 IF DB<=2 THEN GOTO Isag 
3465 LET SU=0 1298 LET F=DB4+%9 
“sa GOTO 457 13809 PRINT “E OBRIGADO AR DISPENSAR “.F.“ PARA CS ENTERRAR. " 
S3 PRINT “AGORA “.M." AHOS A TIRAR." 1318 LET M=INT crM-F> 
457 PRINT 1328 IF M>=0 THEN GOTO I40a 
459 LET LI=INT cRNDSS+1I0> 1336 PRINT "O BAIXO ORCAMENTO OBRIGA-O A VENDER TERRENO.“ 
SEM LET LA=INT CENDXIB+SS » 1348 LET TO=-INT cmM-L35+1 
s7a PRINT 1336 LET LsL-TO 
asa PRINT “TEM” 1360 IF L>=1000 THEN GOTO 1396 
434 PRINT M.”" E DE DECAMENTO. * 1370 PRINT "NÃO TEM TERRENO SUFICIENTE. “ 
sa PRINT P.! HABITANTES.“ 1388 GOTO 2276 
Sos 1F W=8 THEM GOTO SZ8 13980 LET M=M+TOxLy 
Sia PRINT Ui TRAEALHADORES IMIGRANTES. 1409 IF DG>2908 THEN GOTO 230804 
sem PRINT LL." HECTARES. " 1419 LET P=P-DG 
221 IF Sij=h THEN GOTO “45 1422 LET Di=Di-DA 
522 PRINT SU.“ F NA SLHSSA." 1432 IF DI<Q THEN GOTO 2410 


o TA 1448 IF D2<=2 THEN GOTO 1469 
S2s PRINT "DESEJA RETIRAR O CAPITAL DA SUISSA 7º 1450 IF M>500 THEM GOTO 2520 . 
o Apto o 1460 IF L2=0 THEN GOTO 1528 

1470 LET TO=INT CL2+. ZKLZ2XRND) 


S26 CLS 
O qu sr ri ce 1480 IF Li=Q THEN GOTO 1590 

1490 LET TO=INT <«TO+, 1xW> 
q28 PRINT "MONTANTE & TRANSFEPIR 7! 1590 PRINT TB," TRABALHADORES IMIGRANTES CHEGARAM. 
ses INPUT SUT IS12 LET W=+TA 
safa IF SLUT>SL THEN GOTO S29 1320 LET TO=INT <<<S50B-P>-10-D3/3-D2/5 mk. 7SXC 1+PND)> 
331 LET SU=SU-SUT 1525 IF TO=2 THEN GOTO 165908 
s3e LET M=M+SIT 1338 PRINT ABS TO:" HABITANTES"; 
535 CLS 1340 IF TO<M THEN GOTO isTO 
S36 GOSUB 2254 1350 PRINT “VIERAM SE INSTALAR. " 
548 PRINT 1560 GOTO 1590 
349 PRINT “ESTE ANO OS INDUSTRIRIS OFERECEM "Lar FE POR HECTARE E PLAN 1376 PRINT “DEIXARAM O PAIS." 
TACOES CUSTAM “.Li;" F POR HECTARE. 1590 LET P=P+TQa 
ssa TF Si=A THEN GOTO s7a 16 IF Pct THEN GOTO 2480 
560 PRINT “O NIVEL DE POLUICHO ATINGIDA E DE "SL," UNIDADES MKSA." 1614 LET Te=g 

1620 IF L=2000 THEN GOTO 1684 
576 PRINT 1630 LET TO=INT <S1I-100000XL 3 » 
“80 PRINT “OUANTOS HECTARES DESEJA VENDER AOS INDUSTRIAIS 2" 1642 IF TOc<=L3 THEN GOTO 16648 
som INPUT L2 1658 LET TOsLs 
6RA TF L2cf THEN GOTO s9a 1660 IF TO=0 THEN GOTO 16980 
618 IF L2<l-19088 THEN GOTO au | 1678 PRINT “TEM";L3;" HECTARES PLANTADOS. " 
6260 CLS 1680 PRINT “COLHEU";L3-TO;" HECTARES." 
630 PRINT “NÃO TEM MAIS DO QUE “:L-1000," HECTARES DE TEPRA UISPONIVEIS. 1690 IF TQ=y THEN GOTO 17658 

R , mi dreiné 1780 IF X2>=2 THEN GOTO 1764 

640 IF x1s>26 THEN GOTO 470 17190 PRINT "CA CAUSA DO AUMENTO DE POPULACAO 2" 
ESQ PRINT “OS INDUSTRIAIS NAGQ ESTÃO DISPOSTOS A COMPRAR & FLORESA PELO 1758 LET Xx2=H2+1 
S CUSTOS DE ABATIMENTO," 176B LET TI=INT << 395+RNDA20 tc 1+V2SAc ED+EL 2/20 5 + 


66a LET X1=1 1770 PRINT “O QUE IMPORTOU “. INT CTIKCLI-TODS. "FLS 
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1788 LET M=M+INT <TIKCLI3-TA >> 
17980 LET EB=Ei 

1890 IF EZ<=1B THEN GOTO 15820 
18190 LET E2Z=18 

1820 LET El=EZ 

1834 LET TO=26A0-L 

1248 IF TO<2 THEN GOTO ZiBa 
18SB IF TO<=26 THEN GOTO ig%u 
1360 LET TO=26 

12780 LET TO=INT < TOXS0B% S2+, SARND >> 

1889 LET Ti=S1-1 320006 

1894 IF Ti<=1 THEN GOTO 19318 

19928 LET Ti=1 

1914 LET Ti=TIXTO 

1932 LET M=M+INT <TB-T1 > 

1925 PRINT "O TURISMO", 

1948 IF INT <TO-T1I »<X=MS THEN GOTO 2080 

1950 IF S1<=S9 THEN GOTO 2086 

1960 PRINT “ COMEÇA A HAVER DIMINUIÇÕES 

1978 LET T2=INT CRNDX3+1) 

1980 GOTO 1370+T2x20 

19980 PRINT “GRANDE NUMERO DE PEIXES MORTOS”. 
2200 GOTO 2088 

22180 PRINT “AS AVES ESTRO A DASAPARECER, * 
2020 GOTO 2086 

2034 PRINT "OS RIOS PROCURADOS PELOS TURISTAS ESTÃO POLUIDOS, * 
2948 GOTO 2080 

20580 PRINT “O Hk POLUIDO AFASTA O TURISMO,” 
20684 GOTO 2088 

2070 PRINT “OS HOTEIS ESTRO POLUIDOS Com O 
2082 PRINT “IMPORTOU “.INT €CTO-TI+."F.” 
2885 LET MS5=INT <CTO-T1L> 

2990 LET 59=S1 

2100 LET S2=< 2006-L 2X< 2000-L v—M3-. 44 

2195 IF x39=9 THEN GOTO 2128 

2118 PRINT "RENDIMENTO DAS TAXAS INDUSTRIAIS", X3;" F.' 
2120 IF S2>=G THEN GOTO 2174 

2138 LET Si=INT <S1+52-/2) 

2144 IF S1>=S0 THEN GOTO Z160 

2150 LET Si=S0 

2162 GOTO 2198 

21780 LET Si=INT <S1+S2) 

2198 LET SB=INT (5SB+52-10)2 

21980 LET N5=NS-1 

2208 GOSIUB 2700 

2210 IF NS=B THEN GOTO 2576 

2248 GOTO 455 

22350 CLS 

2255 PRINT “POSSUI mM. "PF." 

2257 PRINT 

2269 RETURHM 


FUMO DAS FABRICAS, " 


coro PRINT "occscccccr cá 

2289 STOP 

2300 PRINT 

2318 PRINT DB. "MORRERAM ESTE ANO MUITAS PESSOAS DEVIDO AOS SEUS ERROS. 
2328 PRINT * 

2330 LET Ta=INT cRNDI3+1 0 

2344 GOTO 2330+20X+TA 

essa PRINT *“.” 

2368 STOP 

2370 PRINT 

2388 STOP 

2390 PRINT “VOCÊ E OQ INIMIGO PUBLICO M 

240MA STOP 

2410 PRINT 

242&4 PRINT “MAIS DE 122 DA POPULACAO MORPEL DEPUIS DA SUA ELETCAO” 
2430 PRINT 

2448 PRINT “OS SOBREVIVENTES APENAS DESEJAM A SUA MORTES 

2454 STOF 


2480 PRINT 

2492 PRINT “OS TRABALHADORES Nº SUA MATORIA INISRARAM. " 

2s0n PRINT “SENTEM-SE REVOLTADOS. 

2S1A GOTO 227A 

25204 PRINT 

2539 PRINT “A FALTA DE DINHEIRO VAL IMPLICAR MAIS PESSOAS MORTAS NA MISERIA. 


2548 PRINT 
25Sa PRINT “A POPULACAU TOMA DE ASSALTO U vosso PALACIO GEFIGANDO-O BO SULCICIO. 


SEM STOP 

2s57a PRINT 

essa PRINT “FELICITAÇÕES 

2594 PRINT 

2600 PRINT "CUMPRIU CORRECTAMENTE O VOSSO MANDATO DE“,N4," ANNOS. 


26190 PRINT 
2611 PRINT "DESEJA TRANSFERIR O CAPITAL PARA A SUISSA ? 
2612 INPUT T5 


| 2613 CLS 


2614 IF yYSC1>xX>"S"“ THEN GOTO 2625 

2615 GOSUB 2234 

2616 PRINT 

2617 PRINT “MONTANTE A TRANSFERIR 7º 

2618 INPUT SUT 

2619 IF SUT>M THEN GOTO 261% 

2620 LET SU=5SU+SUT 

2621 LET M=M-SUT 

2625 CLS 

2629 PRINT "DESEJA SE APRESENTAR AS NOVAS ELEICOES *" 
2638 INPUT Y8 

2640 LET NS=N4 

2650 IF YSC1)2<>"5" THEN GOTO 286 

266R GNTO 44A 

2780 PRINT TAB <19),"cPRESSIONE NEW LINE) 
2718 INPLIT Y$ 

2720 CLS 

2730 PETURN 

2800 CLS 

2819 IF Px67>M THEN GOTO 2860 

2828 PRINT "PODE PASSAR UNS DIAS NAS BAHAMAS” 
2230 IF SllzB THEN STOP 


2846 PRINT "COM".SU,"F." 
2852 STOP 
2960 PRINT "O VOSSO SUCESSOR NAO APRECIOU O ESTADO DAS FINANCAS. 


2878 PRINT “VAI ESPERA-LO ANTES DE ABANDONAR O PARIS. 

28890 PRINT "E TORTURADO E E RETIRADA A SUR CONTA DA SUISSA.' 
2890 PRINT “O SEU CADAVER E ATIRADO ROS CROCODILOS... 

2900 PRINT 

29180 PRINT “MORAL 
2928 STOP 


O CRIME NÃO COMPENSA. " 


NOTA: Para o Spectrum, retirar todas as instruções SLOW e FAST 


——— UM PEDIDO DO CLUBE Z80  — 


Às cartas que nos escrevam, e que exijam resposta da n/ 
parte, solicitamos nos enviem selo dos CTT's. 








in. L'ORDINATEUR INDIVIDUEL, n.º 57 Março/84 
Adap. e Trad.: J. MAGALHÃES 


Se possui interesse e um pouco de paciência, aqui 
tem um programa com um jogo de cartas que lhe 
permite uma interessante utilização dos caracteres 
gráficos. 

O programa possibilita-lhe apenas um único tipo de 
“paciência”. Dispõe de 32 cartas que são baralhadas 
e apresentadas da seguinte forma: 5 linhas de cartas 
com a face escondida; a primeira de 5 cartas; a se- 
gunda de 4; a terceira de 3, etc.... Apenas é visível a 
última carta de cada linha. O baralho contém as 17 
cartas restantes. 

O objectivo do jogo é obter 4 colunas de 8 cartas com 
as seguintes características: 


— Cada coluna terá de começar por um REI e por 
valores decrescentes a terminar num ÁS. 
— As cores devem ser alternadas. 


Para isso terá de introduzir as cartas do baralho no 
jogo, não podendo introduzir nenhuma carta que não 
seja a 1.º do baralho e devendo esta corresponder à 
regra de valores decrescentes e de cores alternadas, 
como foi dito. No entanto pode trocar as cartas de 
uma coluna: para outra, mas nesse caso todas as 
cartas da coluna de saída (cuja face é vísivel) são 
transferidas para a coluna de chegada. As cartas es- 
condidas são viradas automaticamente. 

Os movimentos são obtidos através dos seguintes 
comandos; 


P — Rotação das cartas do baralho em grupos de 3. 

in — Introduz a 1.º carta do baralho na coluna n. 

nn — Troca as cartas das colunas de face visível n a 
n. Indicar n.º da coluna de onde sai a carta e 
n.º da coluna para onde vai (se puder fazer a 
transferência). 

An — Permite transferir o ÁS da coluna n (se existir), 
o que é bastante útil quando está bloqueada e 
especialmente nos casos em que existe uma 
carta debaixo de um ÁS. 

B — Nova partida quando fica definitivamente blo- 
queado. 

D — É equivalente (apenas para os batoteiros!) ao 
comando P, mas só pode ir ao baralho carta a 
carta. 

Assim, uma coluna não pode ter mais de 8 
cartas não pode incluir mais que um REI numa 
coluna vazia. Não haverá alteração possível 
numa coluna terminada. 

O valor das cartas é dado por uma letra ou por 
um n.º: 
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R-Rei — D-Dama — V-Valete — X-Dez — 
9 - Nove — 8- Oito — 7-Sete — 1-Às. 


À cor é representada por uma letra e um desenho na 
1.º carta: 


E - Espadas — P - Paus — C - Copas — O - Ouros. 


ORAR o UA 
VI 
UH! RE 
MALA 


[2 





34 GO TO Sa 


48 SAVE “"PACIENCIA" 
Ja CLS 

BO PRINT "UM MOMENTO..." 
rã FEM 

20 DIM CHC5.3,2) 

ay DIM Ecs 

196 CIM HÇS) 

11 FOR Z=1 TO Ss 

128 LET Rc xz=1 

ly LET Him i=E-p 

lg HEXZT x 


lot LET H$="PIPFPSFSPZEvPOPROLOFOBOSDKOVODO 
CICTYCSELICACCUCRELEVESESEXEVEDER" 

16 FOR x=i TO 5 

ira FOR Dj, TO 3 

1884 IF r>Ncaão THEH SO TO gra 

1384 LET H=2EIHT cRENC$OLEH H$-222+1 

cmg LET CB ns I=HAÇH To H+ils 

cl LET G&=" 

reg LET Lbg="" 
IF H:>1 THEN LET 6$=H$0. TO H-ly 
IF H+2<LEHN H$ THEM LET C&=H$cH+2 TO > 
LET H$=6$+05 
GO TO Sam 
LET Cóia. 
NEXT Y 
HEAT x 
LET Tó="" 
LET H=2HIHT cEHDSCLEN H$-222+1 
Sem LET TE=To+HEcH TO H+15 
528 LET G$="" 
Sa LET D$="" 

aa IF H>1 THEN LET G$&=H$c. TO H-1l4 


m 


E E CE 
SS (ES 
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350 IF H+2<LEM H$ THEH LET Cé=H$CH+2Z TO q 
278 LET H$=G$+L'& 

Sem TF H$c>"" THEH GO TO Sly 

A DAS 


410 Print At 21,0;º BARALHO” 
42H FOR r=1i TO GS 

438 FOR X=1 To 5 
dam TF Célia. rolo="K" THEN Go TO 55 
sã LET Edo ne 
LET L=24Y-2 
PRINT AT L,C;" e 

IF v=Ncxo THEN GO TO S4B 
FOR S=1 TOS 

PRIHT THE C;" “ 

NEXT 5 

PERIMT TRE C;" 

GO TO S5B 

GO SUE 1456 

NEXT x 

NEXT Y 

PRINT AT 24,17; TC TO E? 
TF T&=" “ THEH LET T&="" 
REM Comandos 

INPUT AS 
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O dd DS — 
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MAMA Minh EA 


D/MmME Ms 


(o 
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Mm 
O =] 
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"08 
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180 


IF A$g="P" THEN GO TO E3260 

IF A$cio="A" THEN GO TO 1574 
IF A&cisz="T" THEM GO TO 7EB 
IF A$="D" AND T$<>"" THEM GO TO 710 
IF LEN A$=2 THEM GO TO 3270 
IF A$="B" THEN RUN 

GO TO EBB 

IF T$="" THEN GO TO 604 

IF LEN T$&>6 THEM GO TO 730 
LET T$=T8C3 TO MTE TO Z> 

GO TO 570 

LET T$=T$8.7 TO J+TSC TO 6) 


Go TO 570 
REM Coman 


760 IF nd GO TO 600 


rrB 
788 
"ag 
Soa 
Bim 
s28 
E 
348 
BS 
BEM 
sra 
ss 
30 
at 


LET X=VAL AMZ) 
LET Y=RCXI+NCKD-1 

IF Y=8 THEN GO TO 660 

IF wY41 THEN LET Y=1 

LET UB=TSC TO 2) 

LET V$=C8CX,Y) 

GO SUB 1718 

IF F=B THEN GO TO 608 

IF NHºxi=0 THEN LET Hex y=1 

IF Cócx,lo="Eo " THEH LET %=B 

LET w=y+1 

LET CH x, 'r)=US 

IF LEN T$>2 THEN LET T$=T$3 TO & - 
IF LEN T$<2 THEN LET T$=" " " 
LET Rex I=RCXD+I 

LET C=64x-S5 

PRINT AT 2H&W-2,C;" " 

GO SUB 1450 


G Go TO 570 


560 REM COMANDO nn 


14648 
1478 
1480 
1438 
1500 


LET Hi=VAL ASI» 
LET Kse2=vAL ASCZ> 
LET vi=HCxIo> 


IF r1<X1 THEN LET Wi=1 
LET re=kenxcoi+nNcae7-l 
IF r2=3 THEN GO TO EH 


IF v2<1 THEM LET 2=1 

IF Róxli+iZ>s THEM GO TO 668 
LET Ug=C$CHI,W1) 

LET 4S=CSC HZ, Y2) 

GO SUB 1718 


IF F=ã THEN GO TO 606 


. LET C=6HAI-—S E 


IF vwi=1i THEH GO TO 1409 

PRINT AT 2Xr71-2,C;" » 

PRINT TAE C;" “ 

PRINT TRE C;" ” 

PRINT THE C;" ” 

PEINT THE C;" ú 

FOR ==1 TO g&RCxio 

PRINT TRE C;" E O 
HEXZT x 

IF Cóixe,lo="ko " THEH LET r2=6 

FOR Wd=1 TO Rcxls 

LET Cóoxe,rer+Wo=Co AL, vI+d-L > 

LET Cécal.vi+-lo="E" 

LET Re: 42 )=RC NDA 

LET C=6k4x2-5 

PRINT AT 2H resWo-2,C;" ” 

LET x=x2 

LET Y=72+bU 

GO SUB 1459 

HEXT 

IF Ncxzs=0 THEM LET NexZo=1 

LET N<xlo=HCx1 9-1 

LET Ecalo=cHNeCal << 28) 

IF Nexglioó=g THEH GO TO Egg 

LET x=x1 

LET w=Hcxl os 

LET C=6Xx-S 

PRINT AT 2X%Y-2,C;" a 

GO SUB 1458 

GO TO soa 

FOR Ya to 6 

PRINT AT Y.Cs" " 

HEST w 

GO TO 1168 

REM 

PRINT TAB CG" "PECA MD é 

PRINT TRE C;" = 

IF Cóca,Tmxlo="P" THEH LET FóS=" ' 
IF CM x.vx 1)="0" THEHN LET F$=" E 
IF Cócsx.vxX 1)="C" THEM LET F$&=" Ei 
IF Cóis.wxX 1)="E" THEN LET FS=" à 











EA ei Saia 1 


1518 FRINT TRE C;" "MPE TO Br 17DO FEM 

1520 PRINT TAB C;" "iFSC4 TO 6); lI7IB LET F=g 

1530 PRINT TRE C;" "SESC TO ; Loc IF CUBCILo="P" OR UGCILI="E" AND CYBCI erp 
1540 PRINT TAB C;" " UR vVEClo="0"> THEN LET P=1 

1559 RETURN 1730 IF cUusClo="C" OR USCII="0"5> AND cur lo="P" 
156 REM COMANDO An UR VECID="E"» THEMN LET P=1 

1SZO LET X=VAL ABC 2) 1º46 IF Usc2i="R" AND ve="R " THEN GO TO 1760 
1580 LET 'Y=ECXI+NC MI IF HOT P THEH RETURN 

1550 IF Níxic2 THEN GO TO 60y LET P=a 

1600 IF CH x,r,2)M>"1" THEN GO TO 686 IP Ugo zo="1" AMD vEc2i="P" THEN LET 
1618 LET T$S=TS+CSCK,%) IF USC2)="7" AND veczo="B" THEN LET 
1620 LET Y=y-1 IP Usc2o="5" AND vEc2)="9" THEN LET 
1630 LET Ca6ts-S IF UscZo="9" AND vec2)="" THEN LET 
1640 PRINT AT 2HY-2,C;" " IP UscZo="4" AND vEcro="y" THEN LET 
1ESB GO SUE 1456 IP SCE o="4" AMD vgc2s="D" THEM LET 
1668 PRINT TRE C;" " IP Ugc2)="D" AND veczo="R" THEN LET 
1670 PRINT TRE E" " IF si 2)="Ro AND veczo=" " THEN LET 
1688 IF w<NCX) THEN LET Hexs=y RETURN 

1698 GO TO EMA 
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Autor: HUGO ASSUMPÇÃO 
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Este programa em Basic ocupa cerca de 9.5 K bytes. <r51 THEH GO TO I88 
E um programa para miúdos, servindo para aprende- à eso Do Camo Rca a 
rem tabuada e as contas. Não deixa fazer batota, dificuidadeii-aio: LINE as: IFL 
incicti : ; CMN =zg:.>:1 THEH COTo as 
insistindo sempre até acertar ou para se errar mais de ae qe nn O CÃO DO e &:53 
Co df Lilo sã:ijo UR CORE as os js À 
5 vezes. THEN EO To sê o 
E composto por 3 partes e só com elas é que SE LET d=tai Sao º e 
> Cia Lot co=É: BO TE isa 
funciona: 180 REM Tanuado o o dia 
o TT Finti ' its 
LOI IF o yzf AND x::1 THEM CIS 
13 o ão 5 = 3 à . oO :* e” To Tum 
1.º — “MAD. MAT.” — Chama o Screen e o progra- PRINT “QUERIA VI!" cREEP s.-1E 
ma principal. iis PRINT Frimeis rã di EETtidar 
& igbltada.”: LET g=1 
2.º — “MADMATSCREEN$S — É um Rótulo de pro- 187º PRINT Escuiha tabuada de 
, — = : . amo ? 4 — o O la - | — — “ — 
grama, enquanto se aguarda o programa + & 10: BEEP ,3,1R: BFEP ,1i,28 
as iiQ INPUT LINE ag: IF ag='58" o 
principal. É ITODRE sk:-416 G4roannoe Es & 
. Ds E se sê SG: Pad ti DRC 
3.º — “MADMAT” — É o programa principal. Mit Th =B=1: THEN ED TO 445 
Tora 4 À Sia TRT lit pos, fm 
ado eds tm Aos das te mtas fi= =) HW dig im 
À SUR GSB: PRINT cResponda-me co 
Para jogar, basta responder ao que se pede ou meter RO deve ceric. go TO s187 
(PP " 45 CLS - PRTNT OT 4.4: Eatiube 
“| OS numeros correspondentes ao “7”. e reTr sas Cego aa id E à IRES 
Mo. LHi i=UHioaã: GO csiia sagas 
= SIMA TIIDB HER 
ads do É Eu ms ttis muy: 
i PDKE 22055,2: PRPER 7. Boer iTê PRINT OT 2l,B;Cda estudou é 
ER 7: INK 2 CLS. CO suB ses oa Bhce a FE sd a «e 
+ Lito. LIM sis Aid. feio a do PETS SE HD: SE=IMNRI +: 
ES: LES pc comes e e muco go CULD abi:11iS AMD DODE sg:.:I18 TH 
[ET gã- CM CO TO 121 
ES tis LP ag=ºn" THEN GO TO 
= 
E: 
+ LLS PRINT CDlai,..Bf.T EO PRINT “Quero EF EE js GÉTE 
DEC 1,38. PRINT cDeszcuicei...os noeUu tudo: 
RO De Chama “O: BELP .5,8:. IHPUT ist FOR n=i TO s: PRINT INK nr;a 
"MOME.“. LINE k& T 2.8: CBuANTOS 250... BEEP ,as.s 
lê CLS PRINT “Como esti = W: EIEP ,25,2&R: REEP ,.2,28 
£à SpEtirunts"”: POR n=i TO d amd LET d=INT I<ANDsidDis+s 
+. PRINT O HMusto prazer Er = SS LET e=INT iANDs12141 
CEF .BE,22: NEXT n idã IF e:d THEN GO TO sal 
iz PRINT ar SB; CEI! Zx Spectry Ls PRINT Er RCE o: 
mo; VOl-LhE encinsr MATEMSOTICA. E dido INPUT LiND ag: IF abssaTES 
Pfiheiro a tabuada; Depois 2a cor idse OCH PRINT INK noDT 4,3:;2E 
tas AT iB,B; “ERROU! ...MEa E d+e; 
L3 PRINT Pode clcoiher: À Pol PRINT 'CEctude meiror a tab 
-TREURDRO “E-BDICAS F-SUBTRSCE Vvada |: PRUSE 200. Ci5 :- DEEP. 
Doo Ca-Mii TIPI ICaAceo 2-PIVISSOS CS,5:. BECP ,1,-5: BEFP .5,-iê: & 
Sea se ft Sao fo É > A im vã o. ES SEE um es q . - 3 J: E S são 
Pd Std Cio. w a titis: à ade = : im RES Jg, 
LINE as FP LEMN 2f+iri TREM BO TE ão PRINT CHARS Ajdse 
TE 120 PRINT INE noccERTO REEP. 
E IP CODE 2:45 DR CODE 24:55 Gi,2Z. BEEP ,.25,32. BEEP .1,35: 
23 ET = 4 ipa! = E = Sisto ferito = LR: HEXT rr: 
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EXPOSIÇÃO DE MICROCOMPUTADORES— PORTO 


MICROFAIR II 


? 
de DaTrEs 
ES DSTe De certeza que eu faz 
i ” es 





O 


Edir DoATA PUE DEnS.sada nao term O CLUBE Z80 t Aa 
& recorda: , presente nesta exposição, convi- 
2Qli DATA “Duas verzrez nao espera da os seus sócios a visitá-la. 
va de E: 
Etiz ETE Epa',..Tem de estudar LOCAL: Cave do Hotel Porto Atlântico (junto ao Cinema Foco) 
a 1 =» 
Cis 
5 


DO 
(e Er ES 


Ja Ju 


ua E RE 


Ja da ta. 


“E dicce-me que cabig DATA: Abril, dias 27 (depois das 18 h), 28 e 29 (até às 22h). 


els 
= o - 
Emi É 


a 








CLUBE Zso 





14 








in. L'ORDINATEUR INDIVIDUEL, n.º 57 Março/84 
Adap. e Trad.: J. MAGALHÃES 


Como sabe, as gravações em cassete são mais segu- 
ras, mais rápidas e mais diversificadas no SPEC- malsT Comentários 
TRUM do que no seu antecessor ZX81. Há 4 tipos de [DX 32256 * [221,33,0, 126 Destino dos 
gravação possiveis: XOR A 175 


LD DE, 17 17, 17.0 17 bytes a ler 
SCF 


5.3 á 55 
O — Programa BASIC + valores das variáveis CALL "LOAD" |205. 66,5 
1 — Quadro numérico JR NZ LECT 32, 245 
2 — Quadro de caracteres RET 201 


3 — Blocos de bytes 


CÓPIA DAS 9 LINHAS 


[Endereço | Mnemônicas | Cód.Decimais| Comentários 


Conjuntamente com estes 4 tipos, é gravado também 
um preâmbulo de 17 bytes (HEADER: à cabeça). É 
este preâmbulo que nos propomos descodificar com a 
ajuda de um pequeno programa misto — BASIC + 
Linguagem Máquina (incluída no programa). 

A primeira rotina em Código Máquina, implantada em 


243 | o] A 
ses 


195, 175, 14 





LB CESAR FISSS 
32000, faz a escuta da cassete e inclui os 17 bytes EU CARTA E2l,oa,6,126,175 
do cabeçalho (HEADER) a partir do endereço 32256. = So du ani a da dia Be ioo' Sá 
O 1.º Byte permite determinar o tipo de gravação que iB FOR n=Z2000 TO assi: RERE 
é registada com os valores 0, 1, 2 ou 3 respectiva. * 2 DEC CE =. aorour as 
mente correspondentes aos 4 tipos acima indicados. BSS LoCTricie » cassete” E E 
Os 10 bytes seguintes referem-se às 10 letras do se RnnbuMicoE CSR a O quiid 
. Bi FRáifit Hi 182,3; FPLHIDM À, BRA 
nome dado ao programa aquando da gravação HT 1:“Pare at Ga 3"lze quaia 
A seguir, outros 2 bytes que correspondem ao com- | der tells. SaUSE & 
primento do programa mais as variáveis, ao compri- 7B LET ix=32256 
mento dos quadros e ao comprimento do bloco de SO 1 ET tupesPECR IX o 
So FREI: INUERSE 1, BRIGAS di 
bytes. Programa  “ AND tyupesti+iCquad 
Seguem-se mais 2 bytes correspondentes a: ro numerico é BND tupe=it+i uu l 
sdro de Caracteres “o BND tupes= ? 
— n.º de linha onde se encontra o RUN (entrada em ci dinda de Grtetos AND ts 
funcionamento) do programa após o seu carre- “428 PRINT FOR n=ixs91i TO 
Z+1B: PRINT CHARS PEER n;: NEXT 


| 
E 
I 


gamento. i 
— n.º do quadro (numérico ou alfanumérico) gravado. 
— origem do endereço do bloco de bytes. í 


Ts 


4 
' 
ad: fes 
+ 
) 


Pd GU 


Wu 
ti 
vm 
md 
te 
4 
EM 
TU 
Mm 
| 
E 


sea O 
de ter 

cevel des? b H 
CI 


Reg EM Tete pes 
e | TI UR 


ao feia fes fui Ty to 


MT TRE lis” CARE Is 1%+ 
= À dd SE PEEM iix+lZi;e7 S.ê: 
Os 2 últimos bytes correspondem, para o 1.º tipo de a tupe=i OR tupe-2 THEN PER 
: é INT INUERSE 1; BRIGHT LoCUBriave 
gravação, ao comprimento do programa BASIC, sem DO Bo PRINT " CHRE PEER cá 
alusão as variáveis. i+ld: -DD-SdstFEER ixtldiridglta+: 
A 2º rotina em Código Máquina, implantada em CC a ir. Ra Ta 
l ã : ist PRiri! iNVERDL LL, DRÍCRO dd; 
32016 permite a impressão das linhas do écran na Qt Linha nec“ AND type=2i+: 
impressora. Origem do bigco . o ANE tupe=di; 
+53 rHRÁr: pé A SAL PESD 
Este programa, uma vez carregado e depois de fazer sDEEE iiusddi 
RUN, permite fazer um sumário de registos sobre JB PRIMT RT 7.8. INVERSE do dh 
Nos 2 quadros a seguir, referem-se as duas rotinas 178 PRINT O C,PEER tix+15! +250 
em Linguagem Máquina incluídas no programa. Se PRINTS dd did 
* «Header» — bloco com o nome do programa 283 EO TO Se ia o 


DS TT ————eem 





Autor: PAULO CASTELO 
Porto 


Este programa escreve, ampliadas no ecran e em 
flash a uma frequência especificada, 6 frases de 10 
caracteres cada (máximo do ecran). 


| REM ta FLHSH ++ 


< KEM Paulo Castelo HESZ0S24 
lg IF TOP>=32766 THEN 29 

cQ RESERVE 32770+TOP-REM faz TOF=2276E 
39 FOR n=1TO 285 CLOZERA NEXT nm PUTSI 


46 DPENHO O. "S2"-OPENgE. E DPENGIL.ILL. ala" 

Ea Hl=Penc7 o REM CHRROM Provisor to 

ra REM -——-—— Ficheiro de Proseccao = Eae 

So DIM a605>:REM Evita o DIM agem 

lyy FUT31.23.2-7"ENTRADA DE 5 LINHAS" 

Lg FOR m=iTo to PUTISS NEST 

12H FOR n=aTo & PUT2Z.A ' PLKEGS1,.1E1 

La LINPUTCO" ua Ec 10+, 1 + HRS DE HRS ZE D5a6 ac nn = EFTGO ab lw 


ls POkESS1. 123: PUTZ, 14, 18+n0 Tagen> NEXT n REM E941 = TiPo de Periferico E2oug4I 
156 POKESeS1.1E1 

Lots IMPUTO “FREQUENCIA “FP F=INT.F» 

lg PUT3A POKEGSL. 122 

cBO PlUT23.A ED=ESZ FOR L=ATO Ss 

cy FlotuiP. age |o+" C4S Te = 1+1 45:FOR n=BTOZ FOR c=a7093. a 1=PEEKO HL+n$96+ > 
cem JF m=3THEN a2=4:23=0 GUTO eq 


3) ac=PEEKo HL+nktas+to+:2 + a 3=PEEk( HL + 2E+c+ES | 

dq FOR m=0TO 2-be=0c2Emp bl=be/2-B=(— 31 ANE bl s=b] -24 
2 AND blz=bli-Sg&oc az AND b2s=beo-lsgo ca AND bl = 
+" 33 AND b2o=b2 >» IF A=0 THEM H=32 

cm POFE El.A- ED=ED+L NEXT m-NEXT - 
ce EL=EL+2S MEXT noNEXT Loplot war 


al AND bed=b2)-4ke é a 
AC I+ZKCCaS AND b2 =b21)-153 


ti [F E=A4THEN yum 
1H a=PEEKCESZ > m=PEEKCESS >: n=PEEk ESS 
cn POFESSE, O POKEES3,U:FUKES44. 22 
25 FOR i=ATU 1E42F-MEST | 

qu LET$E.c FOKEEgSZ.a PFOKEESSm POIKESIS 
SO IF wu THEM sou 
CO Fur I=oTy L1E4-F-NEXT Lo GuTo cu 

& GETAS. IF 
24 PlTS1 


C=ATHEM 278 
LuTo Lag 





In. BYTE, Fev./84 
Adap. e Trad.: MARIA IRENE/ALEXANDRE SOUSA 


Este simples método aritmético permite determinar a 
distribuição de custos indirectos, atingindo resultados 
muito mais rigorosos do que os obtidos com cálculos 
de aproximação tradicionais. 

Funciona em qualquer computador e até numa máqui- 
na caculadora. 

O utilizador pode determinar quaisquer custos transfe- 
ridos entre os departamentos de uma empresa, com 
mais rapidez e exactidão, evitando aborrecer-se com 
a resolução de equações ... 


UM EXEMPLO — ANÁLISE DE CUSTOS PARA 4 
DEPARTAMENTOS 


Este exemplo de distribuição entre 4 departamentos 
demonstra como determinar as equações adequadas. 
Usam-se as folhas electrónicas de cálculo de linhas e 
colunas. 

O custo total de cada departamento estabelece-se a 
partir dos encargos transferidos deste para todos os 
outros departamentos, mais os encargos do próprio 
departamento. Equacionando os custos globais do de- 
partamento A, teremos: 


Custo (B para A) + Custo (C para A) 
+ Custo (D para A) + Custo Directo (A) 
= Custo total (A) 


Para simplificar os cálculos seguintes, a equação po- 
de expressar-se assim: 


F(BA) x T(B) + F(CA) x T(C) + 
F(D,A) x T(D) + DC(A) = T(A) 


T— Representa o custo total do departamento refe- 
rdo no parentesis (por uma letra) 





F — Representa o factor de distribuição entre 2 de- 

partamentos (o 1.º departamento é a fonte dos 
“custos; o 2.º é o que recebe) 

DC — Representa os encargos directos de 1 depar- 


tamento. 
F(B.A) x T(B) + F(C.A) x T(C) + F(D.A) x T(D) + DC(A) = T(A) 
F(A B) x T(A) + F(C.B) x T(C) + F(D.B) x T(D) + DC(B) = 7(B) 
F(AC) x T(A) + F(BIC) x T(B) + + FDC) x T(D) + DC(C) = T(C) 


FIA. D) x TA) + F(B,D) x T(B) + F(C,D) x T(C) + + DC(D) = T(D) 


FIG. 1 — Esta figura mostra as equações necessárias para calcular 
OS custos indirectos para distribuição de 4 departamentos. Como 
nenhum departamento distribui custos por si próprio, deixou-se um 
vazio em cada linha. 


Repare-se na simetria das equações, dispostas em 
linhas e colunas e organizadas por departamentos. 
Os cálculos feitos em linha correspondem aos custos 
absorvidos por um departamento; os cálculos realiza- 
dos por colunas correspondem a transferências de um 
departamento para outros. 

Depois de determinadas as equações, são necessári- 
os os factores de distribuição entre departamentos 
(F). Calculam-se separadamente e à parte do proce- 
dimento distribuição-cálculo. Os dados para determi- 
nar esses factores (F) devem procurar-se na contabili- 
dade da firma. 

Uma das maneiras para um departamento distribuir os 
custos por serviços, por exemplo, é tomar como base 
O numero de pessoas em cada sector. Assim, se um 
sector abranger 1% do pessoal da firma e se todo o 
pessoal frequentar o bar, então 1% das despesas 
deste serão atribuídas àquele departamento. E 
calcular-se-ã assim, para os outros departamentos. 
Um exemplo diferente é o das despesas de telefone. 


16—==—SEE [772 == e 


CLUBE Zso 


QD toe eee ES eee 
DD st 


Neste caso, devem ser distribuídas com base no nº 
de telefonemas e no nº de pessoas por sector. 

Os factores de distribuição podem ainda basear-se 
em outros itens quantificáveis (p.ex. a área das salas, 
etc.), equivalentes a algarismos entre O e 1. 

Depois de conhecidos todos os factores, podemos 
substitui-los por equações. Para este exemplo usa- 
mos uma tabela de factores e valores das despesas 
iniciais. Note-se que os espaços vazios foram preen- 
chidos com um factor zero, que pode «tranquilizar» 
muitos computadores. 


DOxT(A) + 10xT(B) + .15xT(C) 
+ 15x T(D) + 8000 = T(A) 


15x T(A) + .00xT(B) + .20xT(C) 
+ 10x T(D) + 7000 = T(B) 


00xT(A) + .10xT(B) + .00xT(C) 
+ .30xT(D) + 9000 = T(C) 

I5SxT(A) + .15xT(B) + 10x T(C) 
+ 00xT(D) + 12000 = T(D) 


Agora, os termos ainda desconhecidos nestas equa- 
ções são as despesas totais dos departamentos. O 
paradoxo está no facto de que elas não podem ser 
calculadas sem serem conhecidas. Aqui, é fundamen- 
tal o processo de repetição/reiteração. 

Assim, assumindo que as despesas totais, são as 
despesas directas, a primeira equação ficará: 


O + 10x 7000 + .15x9000 + 
15 x 12000 + 8000 = T(A) 


O + 700 + 1350 + 1800 + 8000 = 
T(A) = 11850 


O valor para as despesas totais do departamento A 
será mais exacto se estiver entre os valores 8000 e 
11850. 

Usando esse novo valor na segunda equação e ou- 
tros valores assumidos para representar as despesas 
totais, teremos um novo valor para T(B) de 11775 que 
é significativamente melhor que o primeiro aproxima- 
do (7000). 

Outras substituições e cálculos deste tipo relativa- 
mente aos 4 departamentos conduzem-nos as 
respostas finais. Quando terminados, os totais finais 
serão: 


T(A) = 14 455 
T(B) = 14 108 
T(C) = 15769 
T(D) = 17 861 


Conhecidos os custos totais para cada departamento, 
podemos calcular o custo final líquido, ou real, sub- 


traindo os valores distribuídos por cada departamento 
a outro. Neste exemplo, o departamento A distribui 
$2168 ao B e $2168 ao D, ficando um custo líquido 
de 810118. Os custos líquidos para os outros depar- 
tamentos calculam-se de modo idêntico. | 
Quando as distribuições de e para todos os departa- 
mentos estiverem calculadas, a soma dos custos de- 
ve equivaler aos custos iniciais dos 4 departamentos, 
dado que não se pode perder nem ganhar dinheiro. 
Como o total inicial era 836000, a soma dos custos 
líquidos deve ser $36000. 


PROCEDIMENTO EM FOLHAS 
ELECTRÓNICAS DE CÁLCULO 


O quadro 2 apresenta a amostra de dados do nosso 
exemplo numa vulgar folha electrónica de cálculo. 


A B C D E F G 
l CISTE. INDIRECTA DE CUSTOS METODO-CONTREIL ISTICO- 
3 Q ç p (1) a 
4 CESFESAS TOTAIS HH LINHA ACIMA 
5 FARA--DE --DPT A----DPT B--=-LFT C-—-—-DPET D-——— INTLCIAL ==] OTA 
6 CET H ã a, E) [5 atas sono 
7 DPT E e a o a aaa 7208 
8 DFT é [5 : = a ana anna 
9 CPT D o [5 a [3 izoBo 12000 
Ig DESPESAS LIQ. ABAIXO DESTA LINHA FEM 36980 
11 E g a [r 4 
12 =lcccesectasacecacses pci cs q e e q e q q o e ui o O e ei 
13 FACTORES DE DISTRIBUICAO 
14 “4 . 4 15 13 
15 Lã & Ps 1 
16 "5 Í 2 


QUADRO 2 — Apresentação típica de uma grelha de cálculo tipo: 


VISICALC (APPLE) e que pode ser obtida com auxílio do VUCALC 
(utiliz. de máquinas SINCLAIR). 

Nesta folha estão representados os dados p/ análise de uma 
companhia hipotética c/ 4 departamentos. 


Na linha 3 estão as despesas totais de cada departa- 


mento e o total de todos os departamentos. As linhas 
6 a 9 referem os cálculos das quantias distribuídas 
por cada departamento e também os encargos direc- 
tos (iniciais) e os custos totais de cada departamento. 
A linha 11 corresponde às despesas líquidas de cada 
departamento e ao total dos departamentos. Os valo- 
res líquidos determinam-se subtraindo os valores dis- 
tribuidos em cada coluna do total na linha 3. Como 
nenhum departamento pode distribuir mais do que 
100% das suas despesas totais, a despesa líquida 
nunca pode ser negativa. Todavia, pode ser ligeira- 
mente inferior devido ao arredondamento de valores 
acumulados durante os cálculos. 


ms 
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As linhas 14-17 contém os factores para calcular os 
custos a transferir entre cada par de departamentos. 
O programa em folhas electrónicas determina o tipo 
de relações circulares entre departamentos, substi- 
tuindo os valores errados pelo termo “erro”. Para 
evitar encher todo o ecran com mensagens de erro, a 
linha dos totais (B3-E3) estabelece o total por cada 
departamento a partir de zero. Assim, deve certificar- 
-Se sempre de que não há relações circulares quando 
estiver a armazenar os seus dados — senão obterá 
mersagens de erro quando recarregar as folhas 
electrónicas. 

Antes de começar a resolver um problema específico, 
a linha dos totais deve ser copiada da coluna dos 


totais à direita (G6-G9) para a linha 3 (B3 a E3). Nos 
resultados obtidos, a soma das despesa líquidas não 
equivale ao total das despesas iniciais devido à de- 
mora das operações no computador. Contudo, ao fim 
de várias repetições, as despesas totais líquidas e as 
despesas totais iniciais serão as mesmas. De cada 
vez que primir uma tecla origina uma iteração comple- 
ta, e todos os totais aumentarão em cada cálculo. 
Uma diminuição significa um erro em valores, cálculos 
ou fórmulas. Os resultados finais estão no quadro 3, 
que apresentaremos no próximo n.º, juntamente com 
a listagem do programa em BASIC para o exemplo 
referido. 

(Cont. no próximo número) 





Autor: ALEXANDRE SOUSA 


A responsabilidade da modificação verificada, no 
sentido da disponibilidade do computador ao serviço 
do ensino, deve ser imputada principalmente ao avan- 
ço tecnológico, que permitiu reduzir os custos dos 
componentes do computador. 

Existe a nível mundial uma pressão crescente no 
sentido de conseguir a introdução e a aceitação do 
computador na sala de aula, embora se reconheça 
que existem lacunas importantes na existênica de 
programas devidamente testados e com utilização 
imediata no sector da educação. 

Alguns pontos devem ser considerados, quando 
tentamos estabelecer linhas gerais no sentido de ali- 
nhar vantagens (que existem) ao avaliar o computa- 
dor como auxiliar da educação: 


P 
da) Familiarizar as crianças com a nova tecnologia, no 
sentido de que serão elas os cidadãos da socieda- 
de informatizada. 

b) Abordar o trabalho do computador, visto como a 
máquina que aparece a partir de uma extensão da 
electrónica. 

c) Desenvolver a competencia em linguagens de pro- 
gramação, tal como o BASIC ou o PASCAL. 

d) Levar à prática uma aprendizagem orientada e as- 

sistida, usando o computador como auxiliar do pro- 

fessor ou como “projector” de ideias ou de temas. 

Desenvolver o pensamento e o raciocínio lógico na 

criança. 


É 


lremos tentar desenvolver alguns pontos de aborda- 
gem desta ciência que é a INFORMÁTICA tendo em 
vista que apenas nos interessam PONTOS DE 
PARTIDA para as vossas experiências e tentativas 
futuras de ligação entre o COMPUTADOR e o ALU- 
NO, sempre com a ideia de que o orientador desta 
ligação é o PROFESSOR. 





Um primeiro ponto (que vai ser repetido com muita 
frequência) será o de frisar que: 


— Qualquer utilizador da informática deve ser solici- 
tado para PENSAR 

— Deve saber especificar que INFORMAÇÃO preten- 
de, a partir de uma BASE DE DADOS (fonte de 
conhecimentos arquivada na memória da máquina). 

— tem de saber descrever a informação, a partir do 
mundo real. 


Acreditamos, pessoalmente, que é mais importante 
saber PENSAR DE UMA FORMA LÓGICA E CLARA 
do que conhecer com perfeição as técnicas da 
programação. 

Muitos professores são cépticos em relação ao valor 
educacional do computador e tecem mesmo críticas 
severas aos especialistas da Informática, dado o 
desconhecimento destes (na generalidade) de áreas 
fundamentais em matéria de pedagogia, o que conduz 
a uma certa dificuldade na criação de programas bem 
orientados. 

Mas, este criticismo tem de ser vencido com humilda- 
de, tentando interessar os próprios profissionais da 
pedagogia, nas áreas da Informática, para que os 
programas dirigidos ao Ensino possuam qualidade 
pedagógica. = 

Uma palavra ainda para os professores que colocam 
reservas na aceitação do computador como seu 
auxiliar. 

Existe um grande desconhecimento por parte dos pro- 
fessores (na generalidade), em todo o mundo, das 
potencialidades da máquina, no campo do ensino e, 
fundamentalmente, porque podem ver na máquina um 
competidor. 

Esta é uma falsa questão. O erro existe porque o 
professor pode e deve dirigir a sua energia e o seu 
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tempo criativo para zonas bem determinadas e bem 
importantes da transmissão de conhecimentos. Deste 
modo deixará à máquina as tarefas repetitivas. 


USAR A LÓGICA PARA A DESCRIÇÃO DE DADOS 


A lógica é a base da programação dos computadores. 
Os programas incluem o acesso e a criação de BA- 
SES DE DADOS, as quais descrevem a Informação 
existente. 

Por exemplo, nós podemos descrever a situação dos 
alunos na sala de aula, assinalando a cada um uma 
linha e uma coluna. 





RUI senta-se em C3 
ANA senta-se em B5 
IVO senta-se em AZ 
EVA senta-se em D6 


COMO COLOCAR QUESTÕES 
A UMA BASE DE DADOS 


UMA BASE DE DADOS contém informação, por 
exemplo, sobre as relações entre indivíduos e luga- 
res. Podemos obter estas informações colocando 
questões do tipo: 


NOME DO ALUNO José Dias 
LUGAR OCUPADO”... 


O computador pode dar as respostas possíveis a uma 
questão desta natureza! 

Poderá responder com a designação do lugar do alu- 
no... se este existe. 

Poderá responder com uma mensagem do tipo “ESTE 
ALUNO NÃO EXISTE' se o nome do aluno não faz 
parte da BASE DE DADOS. 

O computador não toma em conta qualquer outro 


facto, que não seja a sua BASE DE DADOS. Ele 
deve estar apto a encontrar a informação pedida; ca- 
so contrário, a resposta será negativa. 


UMA BASE DE DADOS 
PODE CONTER VOCABULÁRIO 


ANA 

ADA 

EVA NOMES DE ALUNOS 
IVA 


MAIOR DO QUE... relação 


QUEM VAI SER RELACIONADO? 


1 — aluno? EVA 
2 — aluno? IVA 


PERGUNTAS POSSÍVEIS: 


a) EVA é maior do que IVA? 

b) IVA é maior do que EVA? 

c) EXISTE ALGUÉM MAIOR DO QUE EVA? 

d) EXISTE ALGUÉM MAIOR DO QUE IVA? 

O programa pode e deve estar preparado para dar 
respostas do tipo: 


EVA NÃO É MAIOR DO QUE IVA 


A BASE DE DADOS PODE CONTER RELAÇÕES 
GEOGRÁFICAS ENTRE LOCAIS 


RIOS: LIMA... DOURO... MONDEGO... TEJO 
LOCAIS: VIANA DO CASTELO... PORTO... COIMY” 
BRA... LISBOA 


O aluno pode ser solicitado a relacionar o local com o 
rio que passa na sua área. O computador pode corri- 
gir as respostas do aluno; indicar ao aluno o total de 
respostas certas e erradas, etc. 


O COMPUTADOR COMO AUXILIAR 
NA MATEMÁTICA 


Desde a verificação de resultados aritméticos do 
estilo: 


4x5 =22 ... CERTO OU ERRADO? 
passando pela resolução das equações... A=4+5 
até ao traçado gráfico de funções ou figuras geométri- 
cas ... No campo da matemática, o computador é um 
auxiliar inatacável e de tal preciosidade que só a 
prática consegue demonstrar nestes termos tão enco- 
miásticos. 
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NO ENSINO DE NOVAS LINGUAS 


Existem programas, que são autênticas maravilhas, 
no sentido do auxílio pictórico e mesmo na audição 
dos sons característicos das palavras originais, neste 
caso com o auxílio dos sintetizadores de voz. 


COMO INTERESSAR OS PRÓPRIOS ALUNOS 
NA CRIAÇÃO DAS SUAS BASES DE DADOS 


Sob um ponto de vista mais avançado, ou seja, quan- 
do nós acreditamos que o professor já perdeu o re- 
ceio de trabalhar com o computador, isto é, com o 
seu novo auxiliar, ele poderá entusiasmar os seus 
alunos de classes mais evoluídas, para que eles se- 
jam envolvidos directamente na criação de BASES 
DE DADOS, de cada um deles. 


8 Podemos sugerir aqui algumas ideias para projectos 


possíveis: 


1 — Sistema solar — informações sobre os planetas; 
satélites; dimensões, etc. 

2 — Desporto — organizar uma selecção de futebol 
— classificar os amigos e colegas, de acordo 
com as preferências desportivas. 

3 — Escola — horário; disciplinas; salas, etc. 

4 — Alunos — medida das alturas; tamanho dos sa- 
patos, etc. 

5 — Árvores — as que existem na zona da escola; 
cor das folhas; frutos, etc. 

6 — Grupos — grupos formados pelos colegas. 

7 — História — vestígios romanos em Portugal 
— batalhas importantes; seus contendores etc. 

8 — Indústria — descrever uma indústria local. 

9 — Automóveis — marcas; preços; velocidade, etc. 

“10 — Mobiliário — descrever os móveis da sala. 

11 — Jogos — soluções de puzzles lógicos — 

resultados de jogos escolares. 

12 — Catálogo da biblioteca. 

“13 — Moda — descritivo da moda actual; cores etc. 

14 — Topografia — localização da escola. 

15 — Lista dos presentes para o Natal. 

16 — Como funciona uma bicicleta; quais as peças 

mais importantes. 

17 — Carreiras de autocarros. 


LOGO — UMA LINGUAGEM PARA O ENSINO 


Uma linguagem de programação pode ser simples 
mas poderosa, ao mesmo tempo. 

As linguagens de programação tradicionais foram 
criadas nos anos 60, com todas as dificuldades que 
as máquinas da época possuiam. 

Em 1972, um grupo de investigadores do M.l.T., em 
conjunto com pessoas de outros centros de pes- 
quisa, desenvolveram uma linguagem baseada nas 
experiências de aprendizagem. 


LOGO é uma linguagem que proporciona vantagens 
nos seguintes campos: 


a) Fornece um ambiente apropriado para a aprendi- 
zagem da matemática. 

D) Promove o desenvolvimento da actividade ligada à 
resolução de problemas. 

c) Serve de introdução às linguagens de progra- 
mação. 

d) Ajuda os estudantes a desenvolver o controlo 
sobre o computador. 

e) Proporciona ambiente de trabalho nas áreas de 
música, artes plásticas, física, biologia e matemá- 
tica. 





e THE SPECTRUM GAMES COMPANION * 


MAUNDER Bob, Linsac, England (Landry) (21 jogos de tipos 
variados, c/ explicações detalhadas). 


e EDUCATIONAL USES OF THE ZX SPECTRUM * 
HARTNELL Tim, JOHNSON Christine e VALENTINE David. 
Sinclair Browne, London (Landry) (um livro dirigido aos pais e 
educadores: programas de matemática, línguas, leitura, gráfi- 
Cos... Introdução à Linguagem LOGO E PROLOG: Um dicioná- 
ro no final). 


e THE ZX SPECTRUM EXPLORED PREÇO 
HARTNELL Tim, Sinclair Browne, Londres 1982. 405800 
e PROGRAMMING YOUR ZX SPECTRUM 
HARTNELL Tim e JONES Dilwyin, Interface. 600800 


NOTA: Os preços são feitos pela Landry. Portanto, não sujeitos a 
qualquer desconto. 


* Preços ainda não fornecidos pela Landry. 


VENDO ORIC - 1,48K 


COM ALGUM SOFTWARE (CASSETES) 


Telefone 673079 (Porto) 





Desejo trocar correspondência com outros 
sócios do CLUBE, sobre programação, apro- 
veitamento de máquinas, etc. Possuo um 
Spectrum 48K e coloco-me ao dispôr de qual- 


quer associado que queira utilizar os meus 
préstimos aqui em Lisboa. 


DANIEL DE OLIVEIRA 
Av. Marechal Gomes da Costa, Lote 9 
1800 LISBOA 
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e MAZIACS (16K) — Versão do “Mazogs” do ZX81. Precisas de espadas, alimentos e sinais dos prisioneiros, de modo a PREÇO 


combateres o malvado Maziacs. Óptima resolução gráfica. 400$00 
e PACMAN (16K) — Moves-te num labirinto onde 4 fantasmas tenham apanhar-te. Mas as posições invertem-se se comeres 

um “superdot”. 400$00 
e HUNGRY HORACE (16K) — Tens que ser rápido para livrar Horace de problemas. Ele é constantemente perseguido pelos 

guardas do parque, porque lhes rouba O almoço, as flores e gera confusão tocando o alarme. 400$00 
e BLACK HOLE (16K) — Naves inimigas estão a invadir o n/ Universo, através de um Buraco Negro. Terás que nos defender, 

usando 3 tipos de armas e 6 naves. 400$00 
e GALACTIC PATROL (16K) — Possuis um campo magnético, um “phaser” e torpedos para te protegeres dos meteoros e 

naves inimigas. 400$00 
e GROUND ATTACK (16K) — Uma batalha espacial em várias zonas com 3 naves que vão sendo destruídas pelos inimigos. 400$00 
e EMBASSY (16K) — Jogo c/ labirinto em 3 dimensões. Podes escolher uma das 50 embaixadas, na qual tentarás apoderar-te 

dos códigos secretos. Agora tens que saber orientar-te para sair. 400$00 
e 3 D TANQUES (16K) — Ataca os tanques inimigos com os teus disparos. Há 3 níveis de dificuldade e possibilidade de 1,2 S 

ou mais jogadores. 400$00 


e SUPERCHESS (16K) — Todas as jogadas usuais. 3 níveis de dificuldade. Inclui uma “Analyse” que te ajuda a resolver 
problemas. A00$00 


e 20 JOGOS (16K) — Space Invaders. Laser. Lunar. Alien. Mastermind. Batalha naval. Maze. Space Roller. Skiing. Comando. 
Holocausto nuclear. Damas. Puckman. Escape. Aliens. Vinte e um. Reversi. Campo de minas. Firefox. Beltman. (Quase todos 


em Basic). 1 000$00 
e GANGSTERS (48K) — Um jogo de estratégia baseado na “Lei Seca” nos E.U.A. em 1920. A tua vida corre perigo, pois 

pretendes “limpar” a cidade de quadrilhas rivais, através de negócios ilegais e subornando a polícia. 600$00 
e DITADOR (48K) — És o Presidente de Ritimba, uma república das bananas. O teu objectivo é governar durante o máximo 

de tempo possível, de modo a depositares toda a fortuna na Suiça. 400$00 
e CONTABILIDADE (48K) — Entrada/Saída Caixa-Razão — Factura etc. 1 000$00 
e DATA FILE (48K) — Ficheiro de fácil utilização (em Português). 800$00 
e PAINT BOX (48K) — Permite fazer desenhos c/côr e guardar na memória ou cassete p/utilização c/outros. 800800 
e ALCHEMIST (48K) — Descobrir o segredo das transformações de objectos. 400$00 
e STONKERS (48K) — Jogo de estratégia em que o utilizador é comandante chefe. Possui div. infant. e pretende capturar os 

objectos. 400$00 
e THRUSTA (16K) — Possui uma nave no Planeta Spectrum. Tem de destruir os ninhos dos Aliens que estão guardados e AY 

onde os ovos crescem rapidamente. 400$00 
e JOGO DE BRIDGE (48K) 400$00 
e OMEGA RUN (48K) — Sim. de voo adaptado c/armas anti-missil. 400$00 
e MAD MARTHA Il (48K) — Aventuras passadas em Espanha. 400$00 
e SCUBA DIVE (48K) — Mergulhador que apanha pérolas das ostras escondidas em cavernas no mundo submarino. 400$00 
e LUNA CRABS (16K) — Devido à falta de minerais preciosos vai ter de os procurar nas LUAS de Saturno. 400$00 
e MICROBOT (48K) — O Robot conduz o camião, ou repara os cérebros de outros robots. Colabore no seu trabalho. 400$00 
e PANIC (16K) — Está debaixo da terra e o oxigénio falta rapidamente. Vai ser confrontado c/ assaltantes e vai tentar 

escapar-lhes. 400$00 
e HUNCHBACK (48K) — Quasimodo aprisionou Esmeralda no seu castelo. Tente saltar a ponte levadiça e salvar Esmeralda. 400$00 


e ANDROID 2 (48K) — O Android é transportado para diferentes zonas onde terá de destruir cinco “millitoids” e regressar à 
sua cápsula de transporte. 400$00 


e OMNICALC (48K) — Com características que o tornam preferencial em relação, p. ex., ao VUCALC, possibilita a construção 
de modelos de cálculo para uso de economistas, contabilistas, engenheiros, comerciantes, etc. Permite usar uma grela de 
cálculo até 5000 números, 99 colunas, 250 linhas. Permite usar todas as funções aritméticas e ainda AND, OR, ASS, 
RANDOM (RND). Intruções em Português. 1 000$00 


e SUPERCODE (16 e 48K) — V. página seguinte 700$00 


E ]11[1[1[1[11000][]]]||Wwww>—>——>———-———— mm — 


DESCONTO DE 20% PARA SÓCIOS — VENDAS NA SEDE DO CLUBE OU PEDIDOS À COBRANÇA 
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As 100 Rotinas, em código máquina, elaboradas pelo 





Di BERBHILI OCORDENSES BDG: 
prog. Supercode: BE D7 ESECS GOTO SESSS 
BE Dn ERERA4 GOTE SERES 
Es FREE-EUOSDIIES E 
BE CFOR-DELETRELE LInES EDH 
ERDOEL —- FRGRE 1 EH EDGRES EFFECDTE ERRGE 
no: SSESSESS Fã SDREER BERROR S5=US5S 
10 RIHES SGOSCii-ir Sur: Fi UERISEI ES GERSDHLIET EESES 
=> HRIGEER EDSCii-DoHS red FE BS-LINE PEINTIAS EDE 
> LERES SURULAi lr === 5 ETRETESIE cas FEB 
a SiSEs SUESDii-Kgics=-T sas. ft FLRER SHEITORH DELES 
= HRISES SOSDii-LEET =>" — FE ERIGBHT SHEITOM EE IES 
= LIOEES SoOScii-iert E e Fã FEIRT-FILL SE 155 
E LEREE TEP is HOR-LEFT Es*Ems Isis FF REDESE EDinE S5=s 
D [LORES HiD= is SGR-IÍEFT O EusEs FÊ FEFIRS SOLHE 5B5S :B 
“4 LEBES LEE iva SER-LEFT SSI: Pã SoiFi CRBEADTESR SET E 7 = 
sis Ii DREE TEF S.s SER-LEFT 4 ds Gil FERTEDS FADRRER SE 
é à IDHELE iCE == 5S5OR-ilEFT Es *sêsisis us EH — FRHRE E 
NO dee CU Ca O ue no ei e 
io 1 DREG MID icm EOSR-EGHT ElisTE ED CONRTEROS FECGESBS = NE 
5 LESES TOEF Soa SBOR-EGRT EUESS Bi ELFRAROE GER SBaAHS 
if LESES iCE Ds EDR-SSHT Elo ED SFPFPEROE SETRTERERT 54 
sd RIFPLE-SCURUELA LEF Sua ss bo FilSi rFSE FERELSKRARR Em isisês 
EE GELTTIESR-SORDI: LEFT ==ST= ET TESFE HEROES CEGBRES EDGE 
=D FiFFiE-SOSDii HicrT ==: BE LITE REDSRESS ERR FE 
inDEr - PRRE E BH EOREERN GESIE ESB Iis 
| Ro FORSEES GO BENCDOKFADRE FEDGSESR EERu= 
| 1 GHITIER-SOSDiIL nicht GUESE Di SORIFEE nHEROSS 5BEBEr 
DD LDRES i-DinR SORCiL Es 75 de FEM LDADEE sS53450 
| E53 LOURES E Bins Ecscit SUNS Ga FHRIT LBEVPSESS BERTE 
| Di DCOGECA FIit = en q ii -DOEE ETRINGS SSESS 
E5 EUSREEMN STORE do dr GE i-DREE ETRINGS Sh.» 
. DD EUSCE CirlesFHIaT = Edo Sã ii DRBSE FADGSRER SEs:s 
| 27 SOSFER ELCLREBRGE Su Tas = * II -ORSIE FADKRRER SEBES 
= Em ClLERE Fil E SG LUTODMNFiIESE LIisStTIRE SESES 
| +11 toy m&MocRE ENERa SUESNDAPFREDO HRimeEss 55 :-is 
ay EEIBHT DM SuSue Sobre a Rubrica 
35 ERIGHT DFF =SuEHES O SEU NOME NOS SEUS PROGRAMAS 
| aB BTTRIELTE ECR-DEUI Smna i (V. N.º 16, JANEIRO, PÁG. 1) 
| o ENDEs - FRHE & Hugo Assumpção reflectiu e sugeriu o seguinte: 
| O identico (é peido q nesses “Como é possível existir uma linha O que é indelével (pois não se 
ud £idE SEA id Hds pode editar) e, no entanto, continua a pertencer ao programa, 
| 3 LNÍi-DITE SoLuRR-GER =D podendo conter instruções realizáveis por RUN ou GOTO. No en- 
| ki Diimi -RETE SoLnp-GER SHEETS tanto não posso introduzir directamente a linha O REM, pois dá erro 
| 45 Ei EEER GImliiatos SS C NONSENSE IN BASIC. Também posso meter linhas depois de 
e o bm A, Essas o E 9999. Ex.: No programa, POKE A, 39: POKE A, 16. 
“a =ir-LEFT Ecerioo Eme É sempre possível retirar o que está escrito nessas linhas? Sim! 
LD Gili-EIGEÉT EcCECiL = 4 = Na linha O não é possível apagar (só alterar) o que está escrito. Já 
Dil FRiQES nE-OISBE SOSEil === 1.5 no caso das linhas após 9999 é possível apagar. 
Eos FRIFECL mne-nIiBr Eerer:: Ee = b=Fs : : : : 
ebeça ng imita o rsss SSAMESGLN SS ore SR O processo mais simples de aplicar o OOPYRIGHT é ter um 
E GIRES EE-Dins EPEriL Pacaligcias programa com p. ex.; O REM BAAL CORP e fazer MERGE "”. 
Zi EISEER-PEINTO ==> Introduz automaticamente a linha O no programa e apaga a que lá 
55 SERDLA FimEFO GERESSIDA GS] estava — o que não é muito bom. 
55 ELUDA BEBDSY InSEST => "5 O processo de impedir que se veja o programa é usar esta linha 
E: ELOA LINE RELETE pe Sp tai 
O e q ssepieinineanõo antes de qualquer outra, no início: 
55 DHERE EDERGREI E = Es O LET A = PEEK 26613 + 256 +» PEEK 23614: 
Eis ANPR EE E SE POKE A, 0: POKE A + 1,0 
E : FREnSSSS e guardá-la com 
DE DED- MEN CONVERTESR =5sas SAVE “...” LINE O 
55 FREL-CDEDO CEGLERTES ST LS isto impede que se faça BREAK, ou seja, limpa o computador. 
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INSCRIÇÃO COMO ASSOCIADO 


O CLUBE Zso está aberto a todos os utilizadores de microcomputadores. 
A intenção de associar os entusiastas das micro-máquinas, é exclusivamente a de permitir: 


1 — PUBLICAÇÃO DE UM JORNAL MENSAL, onde sejam publicados programas de uso geral ou específico 
como no caso da educação. 


2 — PROMOVER TROCAS DE PROGRAMAS, e trocas de experiências; tanto no caso do Software (programa- 
ção), como no caso do Hardware (electrónica). 


3 — PROMOVER DESCONTOS NA AQUISIÇÃO DE PROGRAMAS. 


4 — LANÇAR CURSOS DE PROGRAMAÇÃO EM BASIC — PASCAL OU OUTRAS LINGUAGENS E DIVULGAR 
O USO DE LINGUAGEM MÁQUINA. 


e —— 


1/8 O usa im 

IDADE COMPUTADOR TIPO usasse ea cre snsceene pão 

PRO O iimimaineiiir i anieri een caiam 

ENDEREÇO , cacau irei ea ri ASI gnt csrar spas saias a 

een ia eai eres irieericerrie ceara ceia aaa ireesentaencaeaaiacacaece mean caes tese eereeeeeenemeememeeeme FERE, ccnisssea asia aa 
ASSINATURA ANUAL — Esc. 1 500800 (] 


ASSINATURA SEMESTRAL -—Esc. 750800 [) 


CHEQUE OU VALE DO CORREIO 


N “ CODUSDSSLCDDOLOCSSsS cosas nDon nona nas ana nansncosOnan nano nasc ocn nana o onsans caca savanas ese ca cacanacana sena cancao ce cacem ana aa a a ana ar renan a na a a a a 


JÁ SÓCIO O 
NOVO SÓCIO O -» A partir do mês de emana (inclusive) 

















